home *** CD-ROM | disk | FTP | other *** search
/ Informática Multimedia 1995 April / Informatica Multimedia CD - Epimundo.iso / DOS / FILE_CHG / LS341 / LSORT.H < prev    next >
Encoding:
C/C++ Source or Header  |  1991-12-28  |  6.2 KB  |  241 lines
  1. #define C88 Y
  2. #ifdef MSC
  3. #define LINT_ARGS Y
  4. #define UNSIGNED unsigned
  5. #else
  6. #define UNSIGNED
  7. #endif
  8. #define BIGFILE 0xFFFFFFF
  9. #define MAXFI 16
  10. #define CPMEOF 26
  11. #define MAXSTR 1024
  12. #define MAXLRCL 4096
  13. #define NWAY 9
  14. #define MAXREC 16003
  15. #define SBUFLEN (64000l)
  16. #define MBUFLEN (SBUFLEN)
  17. /* Note MIN_SORTRECS * 4 must be big enough to hold 2*MAXLRCL + 4*MAXSTR */
  18. /*      MIN_SBUFLEN must be big enough to hold NWAY*MAXLRCL+10KB (32KB) */
  19. #define MIN_SORTRECS (MAXLRCL + MAXSTR)
  20. #define MIN_SBUFLEN (MAXLRCL*NWAY+10240)
  21. #define MAXFLDS 32
  22. #define NWAY2P1 (2*NWAY + 1)
  23. #define DBMAXFLD 32
  24. #define DB3MAXFLD 128
  25. #define DBFLDSI  16
  26. #define DB3FLDSI 32
  27. #define DBHEDLEN 521
  28. #define WRITEBIN 1
  29. #define READBIN (O_BINARY + O_RDONLY)
  30. #define strmvc strcpy
  31. #define submvc(to,from,len) _move(len,from,to)
  32. #define length strlen
  33. #define tget gets
  34. #define tput(s) bdosputs(s),bdosputs("\r\n")
  35. #define strclc strcmp
  36. #define subclc strncmp
  37. #define subcmp strncmp
  38. #define subcpy(to,from,len) _move(len,from,to)
  39. #define swrite(f,s) write(f,s,strlen(s)),write(f,"\r\n",2)
  40. #define bswrite(f,s) write(f,s,strlen(s)),write(f,"\r\n",2)
  41. #define sread bsread
  42. #define c80puts puts
  43. #ifdef MSC
  44. #define _move(count,source,dest) memcpy(dest,source,count)
  45. #define _setmem(dest,count,value) memset(dest,value,count)
  46. #endif
  47.  
  48. #ifndef _MAX_DIR
  49. #include <stdlib.h>
  50. #endif
  51.  
  52. #ifndef min
  53. #define min(a,b) (a<b ? a :b)
  54. #endif
  55.  
  56. struct dbfld
  57. {
  58.     UNSIGNED char dbfld_name[11],dbfld_type,dbfld_len,fill_0[2],dbfld_dec;
  59. };
  60. struct dbhed
  61. {
  62.     UNSIGNED char db_id; /*=0x02*/
  63.     int  db_nbr;
  64.     UNSIGNED char db_dte[3];
  65.     int  db_lrecl;
  66.     struct dbfld db_flds[DBMAXFLD]; /*field attributes*/
  67.     UNSIGNED char db_trail; /*should=0*/
  68. };
  69. struct db3fld {
  70.     UNSIGNED char db3fld_name[11];
  71.     UNSIGNED char db3fld_type;
  72.     long db3fld_addr;
  73.     UNSIGNED char db3fld_len;
  74.     UNSIGNED char db3fld_dec;
  75.     char db3fill[14];
  76. };
  77. struct db3hed {
  78.     UNSIGNED char db3_id; /*=0x03 or =x083 (if dbt file) */
  79.     UNSIGNED char db3_dte[3];
  80.     long int db3_nbr;
  81.     int  db3_headrln,db3_lrecl;
  82.     UNSIGNED char db3_headfill[20];
  83.     struct db3fld db3_flds[DB3MAXFLD]; /*field attributes*/
  84.     UNSIGNED char db3_trail; /*should=0d*/
  85.     UNSIGNED char db3_cpmeof; /* set to 26 if needed */
  86. };
  87. struct fieldinfo {
  88.     int (*lcmpsub) () ,fstart,fcond;
  89.     UNSIGNED char flen,ftype;
  90. };
  91. struct sortparm {
  92.     long int rcount[MAXSTR],filesize;
  93.     int lrecl,str_wri,maxlrecl,db3hdrln;
  94.     struct fieldinfo lsdata[MAXFLDS];
  95.     UNSIGNED char dbasebuf[DBHEDLEN],mfile[NWAY2P1][_MAX_DIR],infi[_MAX_DIR],otfi[_MAX_DIR];
  96.     UNSIGNED char ansbuf[128],merg_inn,merg_pass,merg_drive,smi,nflds,nway;
  97.     UNSIGNED char drive1,drive2,mount,phase,harddisk,cpmeof;
  98. } 
  99. ;
  100.  
  101. struct mergebuf {
  102.     char *mbuffer;
  103.     unsigned int mbegin,mend,msize,meof,mchann; 
  104. };
  105.  
  106. #ifdef LINT_ARGS
  107. char *parsepp(char **,char);
  108. int is_dbase3(unsigned);
  109. int cscan(char *,char);
  110. int slngcmp(long *,long *,int);
  111. int slogcmp(char *,char *,int);
  112. int shlfcmp(int *,int *,int);
  113. int sfltcmp(float *,float *,int);
  114. int sdblcmp(double *,double *,int);
  115. int sxcmp(char *,char *,int);
  116. int sycmp(char *,char *,int);
  117. int szcmp(char *,char *,int);
  118. int sintcmp(char [],char [],int);
  119. int zonecmp(char [],char [],int);
  120. void oterr(int otchan,char *msg);
  121. int copyfi(struct sortparm *);
  122. int lssort(struct sortparm *);
  123. void sortout(char *[],int,struct sortparm *,int,char *);
  124. int sortin(char *[],int *,char *[],long,int,int,int *,long *,struct sortparm *);
  125. void mergrbuf(int lrecl,struct mergebuf *mbf);
  126. char *mergread(struct mergebuf *,int,char);
  127. int mbfint(struct mergebuf *,int,int,int,
  128. char [NWAY2P1][_MAX_DIR],char *,char **,int,char);
  129. int sortread(int,int,char *);
  130. void mergwrite(int,char *,int,struct mergebuf *);
  131. void mergflush(int,struct mergebuf *);
  132. void mountout(char *drive,long size,char *outfile,char harddisk);
  133. void mwork(char *drvie,long size,char harddisk);
  134. int openfi(char *,int);
  135. int create(char *);
  136. int bsread(int,char *);
  137. void fixinfi(char *);
  138. void getsdat(struct sortparm *,struct db3hed *);
  139. void mhelp(char);
  140. void getfldf(struct sortparm *,struct db3hed *);
  141. int setcmd(struct sortparm *);
  142. int getstart(char *,struct db3hed *,int *,char *,int,int);
  143. int getlrecl();
  144. int gettype();
  145. int sortcmp(char *,char *,struct sortparm *);
  146. char *rtjust(char *,char *,char *,int *,int);
  147. char *dlmfld(char *,int,int *);
  148. int lsfloat(char *,int,char *);
  149. void sortmove(char *tostr,char *frstr,int lrecl);
  150. int userip(char *);
  151. void userop(char *,int);
  152. void lsmerge(struct sortparm *,struct db3hed *);
  153. int sort(char **,int,struct sortparm *);
  154. void qksort(int,int,char **,struct sortparm *);
  155. void hpsort(char **,int,struct sortparm *);
  156. void sift(int,int,struct sortparm *,char **);
  157. void chkdbase(UNSIGNED char *,UNSIGNED char *,struct db3hed *);
  158. int getdbase(struct dbhed *);
  159. int getdb3(struct db3hed *,int,int *);
  160. void setcmp(struct sortparm *);
  161. void srchdbh(struct dbhed *,char *,int *,int *,char *);
  162. void srchdb3(struct db3hed *,char *,int *,int *,char *);
  163. int suprcmp(char *,char *,int);
  164. char *pr(char *);
  165. int prmpt(char *,char *);
  166. #else
  167. char *parsepp();
  168. int prmpt();
  169. int cscan();
  170. char *pr();
  171. int _os();
  172. void oterr();
  173. int copyfi();
  174. int lssort();
  175. void sortout();
  176. int sortin();
  177. int sortip();
  178. int sortic();
  179. int sortia();
  180. void sortoa();
  181. int sortib();
  182. void sortoc();
  183. void sortob();
  184. void mergrbuf();
  185. char *mergread();
  186. int mbfint();
  187. int sortread();
  188. void mergwrite();
  189. void mergflush();
  190. void mountout();
  191. int mwork();
  192. int openfi();
  193. int create();
  194. int bsread();
  195. void fixinfi();
  196. void getsdat();
  197. void mhelp();
  198. void getfldf();
  199. int setcmd();
  200. int getstart();
  201. int getlrecl();
  202. int gettype();
  203. int sortcmp();
  204. char *rtjust();
  205. char *dlmfld();
  206. int lsfloat();
  207. void sortmove();
  208. int userip();
  209. int userop();
  210. void lsmerge();
  211. void merge();
  212. long merge1();
  213. void saveparm();
  214. int mrgorder();
  215. void prtstat();
  216. void setup();
  217. int last_pass();
  218. void merge0();
  219. int sort();
  220. void qksort();
  221. void hpsort();
  222. void sift();
  223. void chkdbase();
  224. int getdbase();
  225. int getdb3();
  226. void setcmp();
  227. void srchdbh();
  228. void srchdb3();
  229. #endif
  230.  
  231.  
  232. #ifdef MAIN
  233. char temp[15],*blankline;
  234. long int mtotbuflen;
  235. unsigned max_sortrecs, max_sbuflen;
  236. #else
  237. extern char temp[15],*blankline;
  238. extern long int mtotbuflen;
  239. extern unsigned max_sortrecs, max_sbuflen;
  240. #endif
  241.